module tb_fulladder1;
	reg A, B, Cin;
	wire S, Cout;
	reg [3:0] i;

	fulladder1 DUB(.A(A), .B(B), .Cin(Cin), .S(S), .Cout(Cout));

	initial
	begin
	  for(i=4'b0000; i != 4'b1000; i=i+1) begin
	   #10 A = i[0];
	       B = i[1];
	       Cin = i[2];
	  end
	end

	always@(A,B,S,Cin,Cout)
         begin
	  #5
	  $display("A : %b, B : %b, Cin: %b", A, B, Cin);
	  $display("S : %b, Cout : %b", S, Cout);
	 end
endmodule
